BOB 



Syntax: RUN GI 
BASICX)9 to do c 
GFX2([pathKunct 
handle enhanced 
Usage : Graphics 
windowing comm 
help to users will 
@IDENT Syntax: 
from OS-9 memoi 
single line output 
directory @INIZ 
@INKEY Syntax: 
input a si 
the proc 
memory 
text files 
memory 
director}^ 
module c 

@n^1librarian 



sides *No. of cylind^s' On decimal) :Interleave value: On decimal) @FREE Syntax: 
Free Jdevname] j Jsage : Efeplays number of free sectors on a device @GFX 

ce package for 

Syntax: RUN 

BASIC09 to 

Syntax: none 

die graphics/ 

: Give on-line 

of help topics 

r information 

mory -s « use 

at execution 

ch a device 

subroutine to 
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(5)M0DP 
memory 
compare 
to module 

module M « m^^lr TRrk TT e iinma^lr TOrk tf^MOMTYPF ^^vntav 




Usage : Set m< Addresse s for Corresp ondence 

monochrome rr Eciitoriaj M ate ri al: 

and links an CX r- ^ t> 

Procs [e] Usag< Gordon Bentzen 

display all pro 8 Odin Street 

curVent dat^ d SUNNYBANK Q l d 41Q9 

execution direcl Subscriptions & Librar y Requests ; 

Usage : Gives 1 Jean-Pierre Jacquet 

module> Usag( 27 Hampton Street 

[\y/mm/dd/hh:r DURACK Old 4Q 7 7 

Syntax: Setpr < ii 

num @>SHELL^ 

@TMODE Syntax: 

the op^ 

[value] 

<modna 

W 




Montype [opt] 
monitor m » 
;e : Creates 
Syntax: 
Opts : e = 
Prints the 
the current 
rilename> 
mb <i-code 
tax: Setime 
@SETPR 
process to 
interpreter 
or changes 




T©Iili:i!5Iil(S B 



2^ WBl 



Miamibsir (S 




Initialize an#t^g^'^^?v^?rf^ 

i'^roii^ sidln -s=type ^ set screen type For a window on a new screen @XMOD£ | 
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This edition of our newsletter brings us close 
to the end of the third year of production froB 
sunny Queensland. Cur next (August) edition 
tfili coBiplete the three years, and it is now 
tiaie to start thinking of the new subscription 
year. 

Heabers wishing to re-subscribe will need to do 
so before the end of August. Ue vill aaintain 
the saee subscription rate of il8.»6 for the 
cosing year. That's no iTicrease for four 
years!! How is that? This has been lade 
possible by the nuaber of $2 copy fees received 
for public doaain uaterial. 

Current aesbership is 65 and we suspect that 
some of ycu will not wish to renew as you have 
fioved to soiee other coaputer type and operating 
systes. However J we will require a einisufi of 
2^ seafaers to aake it worthwhile continuinq. 



is available on CoCo 039 fonat floppy and Atari 
3.5 forsat. 

Both versions of UGCAT are coeplete with the 
BasicW (CoCo QSS) or Basic (QSK) "Lookup' 
prograsae by Bob Devries. Please send requests 
to our Librarian together with foraatted disk, 
return postage and $2 copy fee. 

The P.D. library as it stands is in "ar" 

archives and coaprises eleven 80 track D.S. 
(72ek) disks. 



IN THIS EDITION 

A easic09 Tutorial fay Bob Devries - Part 2 

"C" Tutorial - Continued. 

FREE - A version bv Hark Griffith - Part 2 



Sose of you have joined the D35 Usergroup only 
recently and we should have supplied you with 
back issues froft Septeeber 199^. I have slipped 
up Bore than once in this regard, so if we still 
owe you any back issues, please drop ae a line 
and I will correct the situation. Any new 
subscribers froE now on will be treated as 
Besbers for the year coaaencing Septeaber i991 
and will be added to the sailing list 
iaaediately. This aay aean one or two free 
issues, but it is just too difficult to aaintain 
an endless supply of back issues. Back issues 
tfiii now oniv be available as disk files. 



ye also have an update to the Newsletter 
CONTENTS listing. This is very handy if you are 
looking for a previous article. 

We are aost grateful to those aeabers who have 
contributed articles for publication in these 
pages and encourage all aeabers to "have a go" 
regardless of your experience level. Soae newer 
Usergroup aeabers are just starting the 0S9 
experience and will need soae help. I aa sure 
that aany of us could tell a long story about 
cur early frustrations and exoeriences, so how 
about a few tips for these new users. 



ft sesbership appiicaticn/renewal 
included with this ne-i-sletter. 



IS 



PUBLIC DOHAIN LIBRARY 

Just a reainder that we have a database of the 

P.D. library. USCAT (UserSroup Catalogue) which 



I have received a few queries froK Eseiftbers in 
trouble with soae applications which nave not 
yet been answered. Please be patient, we will 
ge: there. 

Cheers. Gordon. 
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ft Basic^S iLiionai 

bv Bob Devries 



Here is the BASIC code for tne rusberscusre 
prograsfte frcs 'MicrocoBputing' , June 133] . It 
is fc'ritten in vanills BASIC, but is suitable for 
Extended Colour Basic with minor scditicatiorts, 
in lines ]4e,49e, 760, 92&, 96e and 1450, Can 
you work out what to change? (Note please that a 
colon is used instead of a ftEf!) 

H\^ : Nusber square gase 
m^ ; ver 4.e - 12 nov 75 
eese : dare I. Leavey, h.D. 
0046 LINE= 8 
nS^ 0I6ITS= e 

eese print "number squares^ 
mn PRINT ' ' 

eesc PRINT 

eese print ''yELCuHE tg the yoRio of^ 

eiee print "confusion, there are wj' 

eilO print "VERSIONS DF NUHBER SQUARES:' 

ei2e PRINT " ! - SEQUENTIAL^ 

e]5e PRINT ' 2 - MAGIC SQUARE" 

ei4e INPUT "yHICH IS YOUR PLEftSURE\T 

eise IF T=i SGTC sie 

else IF T02 GC'TG 148 

ei7e : 

eiSe ; SET UP HAGIC 

8158 : SQUARE BOARD 

8288 : 

0218 FOR 1=] TO 4 

8228 FOR J=i TO 4 

8238 READ H(I,J) 

8248 LET B(I,J)=H(I,J) 

8258 NEXT J 

8268 NEH I 

8278 DATA ! ,8,15,8.12,1 i ,2, 5/!8,.]3..4,.3, 7, 16,Sj4 

8298 LET Ii=4 

0290 LET J] =2 

8388 GOTO 448 

8518 ; 

6328 : SET UP SEQUENTIAL 

8558 : BOARD 

8548 ; 

8358 DIM Bl4,4) 

0568 FOR 1=1 TO 4 

8578 FOR J=l TO 4 

8SS8 LET B(I,J)=tI-l)J4*J 

8598 mi J 

8488 NEH I 

8418 LET 1'!=^ 

8428 LET J 1=5 

8:38 : 

8448 ! Hu¥ SCRAMBLE l\^z EOARD 

t!458 : TyO HUNDRED TIMES 



8478 PRINT "I AM NQU SCRAMBLING THE BOARD 

0488 FOR Q=l TO 288 

8498 LET M=INT(1+RNDJ4) 

8588 ON M GOTO 518,568,618,658 

8518 IF n = ] SOTO 498 

8528 LET Bill ,J!)=B(I]-1 ,J]) 

8538 LET B(IM,JI)=16 

8548 LET 11=11-1 

8558 GOTO 780 

8568 IF 11=4 GOTO 498 

8578 LET Bill ,Jl)=e(I]+] ,Ji ) 

8588 LET BCIi+l,Jl)=]b 

0558 LET 11=11+1 

8608 GOTO 708 

ObiO IF J]=l GOTO 498 

0628 LET B(IKJl)=B{I],Ji-l) 

0658 LET B(irj!-l)=16 

8648 LET Jl=ji-] 

8650 GOTO 780 

0668 IF J 1=4 GOTO 498 

8678 LET Bill ,J! )=B(lLj! + n 

8630 LET B(ILJ]+I)=]b 

8698 LET JI=Jlfl 

8708 NEXT Q 

8718 ; 

8728 : PRINT BQARO 

8738 ; 

8748 LET M9=8 

8758 : OUTPUT A "HOME UP'= 

8760 PRINT CHRtdB): 

8778 PRINT " ' 

8788 FOR 1=] TO 4 

8790 FOR J=l TO 4 

8888 PRINT": *; 

0318 IF B(I,J)=16 PRINT « '';:60T0 848 

8328 IF B(I,J)<t8 PRINT " -; 

8S38 PRINT B(I,J): 

0348 NEXT J 

8858 PRINT '':' 

8368 PRINT "- -— ' 

8878 NEXT I 

8888 : 

8898 : ERASE REST OF SCREEN AND 

0988 : SEEP FOR INPUT 

8318 : 

0928 PRINT CHR$(22);CHR*(7);CHR*(7>; 

0958 : 

0948 : INPUT MOVE 

8958 : 

0968 INPUT 'MOVE klHICH PIECE%M 

0378 LET Ii=8;Ji=0 



Jul V 
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lOie NEXT J 

!e2e NEXT i 

lese IF i]=e then print "i m'l find that 

KUMBER^GQTO 9iy 

\m let i2=e;J2=e 

leSe FOR 1=1!-] TG lUI 

itfbe IF i>4 sqtg iesy 

1876 IF I<! 8QTC 1^90 

lese IF B(LJi)=]fc then I2=[:J2=J1:S0T0 \m 
^96 KEXT I 

lee fgk j=ji-! to ji+i 

lie IF J>4 GOTO I140 

126 IF j<! SGTO 1)46 

]5e IF e(l!,J)=]£ THEN 12=11 :J2=J; SOTO ]l7e 

"UC NEXT J 

1 56 LET h9=r19+i 

IJbe PRINT "NOT A VALID flOVE":6DTC SfiC 
!]7t! LET E(I2,J2)=!^ 
1180 LET B(IKJI)=ib 
1 190 QN T 9QTi] 12]^. 1320 
12y^ ; 

12i0 ; SEQUENTIAL SOLUTIOhi 
1220 ; 

\23^ LET C=t^ 
■240 "UK 1=^ TG i 
1250 FOR J=i TO 4 
i2be IF B(LJ}<C GOTO 726 
127^ LET C^BCI J) 
im NEXT J 
129^ NEXT I 

]500 PRINT =YOU SOT IT'" 
]3l(? cOTO USC^ 
1320 ; 

|55h ; HASIC SOUflRE SGLU^IOH 
1540 : CHECK 
iSSe : 

13b(? FOR I=! TO 4 
]37e FOR M TO 4 

1 'j'~'i\ j L p i' T T 1 / S M (■ T T "1 Snin I'/Vi 

i 39^ NEXT J 

liHf? NEXT I 

i41y : 

142^ ■ f^ 'hlN IS DECL^^REO- 

U3^ ; 

ii46 PRIfv^ "THAT IS THE CORRECT SOLUTION r 

1450 INPUT 'LIKE Tu PLAY ANOTHER GAHEMt 

liSe IF LEFT$(I?J)="V'' THEN RUN 

I47e END 

The gerije i= i fairly 5iB:pie one based on tne U5& 
of aulii-dirReriSiOiiea arrays, NGte tne use of 

■■Ai-.nr ;-+ t Kc- Ka^ ^ r.r, t nri r,* P^W i t r.GC iiihi'-!-! ic 

also oossible m DEC8. Now coeeE trie t"icf;y 
Dc.rt-. tnt conv^j'siCT; 'o Bssic^S. Firstlv I'll 



PROCEDURE njEbersquare 

il versior; i.^ - 12 NOV 79 

(i Har: I . Leavey . rlD 

(i 3a5icy9 versior: By Bob Dsvri&s April 91 

DIH ijilfiTEGER 

OIri b(4,4):INTEGER 

Din i K; I ! INTEGER 

DIH G.!i;,s9. c ! INTEGER 

Dir: Ef!ffi(4^4): INTEGER 

OIri iop;BOGLEAK 

OlFl validiBOGLEAN 

DIH 5oiuticr;;800LEAN 

Dlri n£:¥G5Eie; BOOLEAN 

SHELL 'tsode -pause' 

r;et?aafjie=TRUE 

UHILE Ti9ygar^£=TRUE 00 

PRINT CHR$(i2) ; 

PPT^iT «rJ ii M R i: w •:; n u ^ Ct z c« 

1 niiii ii w 1 ^ 1.' ^ n -v v^ V n 1 ■- L. V 

pPTfJT " G 

PRINT 

PRIN" "lnlelcoEe to tne scrld of* 

PRIN~ "confuEicn Tri9r& are two" 

PRINT "vsrsions of rjus'sbs'' SGUsresl'^ 

PRINT " i - sequential" 

PRINT ' 2 - hagic Souare' 

IMPU^ "yhich 15 your pleasure ? \i 

I^ t=i THEN 

RUN seirUDSsbkb. ii J : ) 

ELSE 

RUN =etuD!fiSb(b.K-ii,iijl ) 

PKW 'I aj: no^ scranibliTiq tne board..." 

FOR G=! TO 2$^ 

Icd=FALSE 

yniLE ico=false do 

IF ff=! THEN 

J- t;{>; then 



k '" ; ' i 1 I — k. ' 'i i 



bU-' .^: ■=!b 



.1 J 



enoif 




ENDIF 




IF K-2 


THEN 


IF []( 


■'4 THEN 


bi i ■ i 


^ ^=D(i! + : j!) 



h f 1 i 4- ; 1 i ! r t 



e■(ll,j\yi5(>l,j)-l^ 



■r- C!t 
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b(i!,jl-l)=lb 

Ji=ii-i 

iop=TRUE 

EN'DIF 

ENDIF 

IF jfi=i THEN 

IF jlOi THEN 

b(il,j])=b(il,i!+!) 

b(il.ii+])=]b 

iop=TRUE 
ENDIF 
ENDIF 
EKDWHILE 

mi q 

a print boarc line 72e 

5Giution=FALSE 

REPEAT 

RUN gfx2('cw£re5V2S^I2.22,12) 

pPTjyT « = 

FOR i=l TO i 

FOR i=i TO 4 

PRINT ": ^ 

IF b(ij)=16 THEN 

PRINT ' **; 

ELSE 

IF b(i,j}(]y THEN 

PRINT " =; 

ENOIF 

PRINT b(i,j); 

ENDIF 

NEH i 

PRINT ":' 

PRINT = ' 

NEXT i 

(i input aove 

valid=FALSE 

yniLE vaiid=FALSE 00 

yniLE i]=e do 

RUN gfx2(''bsir) 

INPUT 'Hove yhich piece ? ',6 

IF ffi=e THEN 

RUN gfx2("ctfareaV,e..e,3e,24) 

PRINT CHR$(]2) 

5HELL Hsode pause" 

END 

ENDIF 

FUH i=l TO i 



NEXT i 

IF il=e THEN 

PRINT M can't find that nuaber" 

ENDIF 

ENDyHILE 

i2=e 

j2=e 

FOR i=il-l TO i1+l 

IF i>=l AND i<=4 THEN 

EHTIF b(ijl)=lb THEN 

i2=i 

i2=ii 

valid=TRUE 

ENDEXIT 

ENDIF 

NEXT i 

IF valid=FALSE THEN 

FOR i'}]'] TO il+i 

IF i>=| AND i<=i THEN 

EXITIF b(i!,j)=]6 THEN 

i2=il 

i2=j 

V6iid=TRUE 

ENQEXIT 

ENDIF 

NEXT i 

ENDIF 

IF valid=FALSE THEN 

E9=iBy+l 

PRINT 'Not a valid ffiove" 

END IF 

ENDyHILE 

fa(i2,i2)=6 

b(il j'D=lfa 

IF t=l THEN 

c=e 

FOR 1=] TO 4 

FOR j=l TO 4 

IF b(i,j)<c THEN a reprint board 

5oiutiDn=FALSE 

ENDIF 

c=b(i,j) 

NEXT j 

NEXT i 

IF 5oIution=TRUE THEN 

PRINT 'You got it!'' 

ENDIF 

ENDIF 

IF t=2 THEN 

FOR i=l TO 4 

FOR j=l TO 4 

ir KM i){)p«m(i i\ THEN (? r^Drint Dc^^d 

5oluticn=FALSE 

ENDIF 

NET J 



AUSTRALIAN QS9 NEUSLETTER 



PRINT "That is the correct solution!" 

ENOIF 

ENDIF 

Until solutlon^TRllE 

INPUT 'Like to piay another gase '' =,i$ 

IF LEFTt(i$,l)='=n" THEK it rerun gaae 

netfQ3fie=FALSE 

ENDIF 

ENOyniLE 

RiJN gfx2{"cwarea%e,e,.8e,2i) 

SHELL ''teode paass" 

ENQ 

PROCEDURE setupEsb 

BfiSE 1 

PfiRAh: b(4,i):INTE6ER 

PARAH i^ii: INTEGER 

m i, J : INTEGER 

FOR !=] TO i 

FOR j=] TO ^ 

b(i J)=(i-l)J4+; 

NEKT j 

NEXT i 

i!=4 

it=4 

PROCEDURE setupasb 

EASE 1 

PARAK b(4,4),s!ri(4.4):IKTE6ER 

PARA?! iljl: INTEGER 

DIH i,j:INTE8ER 

FOR i=] TD 4 

FOR j=l TO 4 

READ Bi(i,j) 

b(i,i)=ei6(i J) 

NEXT j 

NEXT i 

il=4 

J 1=2 

DATA KbJ5,SJ2Mi,2,5jeJ3J,37,!6^SJ4 

OK, 5C here we gc. First, I used the coasand 
BASE I. This is because all the arrays in the 
BASIC prograisffie start at 1, and BasicOS usually 
starts at zero (actually. SASIC does loo, but I 
see no reason to waste valuable seaory). Next, I 
diiensioned all the variables and arrayS; 
including a variable type which you say not have 
seen before, the BOOLEAN type. This variable aay 
only contain either TRUE or FALSE! I used the 
SHELL cosi&and to turn off the OSS screen pause, 
SC' thzt the proQrafs^E' uon't sit the^e t'sitinQ at 
ffhai it thinks is tne end of a screen. That can 
ge* h bil confusing^ 

Ti-ti "'f:.'; T.riinri vo'- RiUS* re'-^iise '- "^.^'r*. I have 



way to prograaae. Sure, BasicBS will allow their 
use, Dut the code is auch aore elegant without 
thea, if a little aore difficult to write. I set 
up a loop to allow the choice of whether to play 
another gaae which is done in line 145^ in the 
BASIC version. I used a WHILE loop here so that 
all I need to do is aake a variable FALSE to 
exit the loop. 

Next, after clearing the screen (printing a 
forafeed character), I print the opening aessage 
and ask the player for his choice of gaae. This 
fellows through to line 160 of the BASIC 
prograaae. On the basis of the player's answer I 
RUN either the procedure 'setupssb' or 
'setupasb'. You aay notice a slight variation 
here, I only tested for a 'T' to select 
sequential, and any other key would run the 
Eiagic square option. Then the next 38 lines do 
tne saifce as lines 480 to 7»e in the BASIC 
prograaae. You will notice that the BASIC 
prograaae uses quite a large nusber of SQTOs in 
this piece of code to break out of various parts 
of the code to continue the FOR-NEXT loop. I 
siBpiy set a variable (lop) to TRUE and again 
used a ItfHILE loop. All the other variables have 
the saae naaes, although you can of course use 
any nase, and are not liaited to two significant 
characters as in BASIC. 

To sake the screen easier to display, I used in 
this case a gfx2 coaaand 'cwarea'. This coaaand 
liEits the area of the screen to be printed to, 
and aeans I don't need to use cursor 
aanoeuvering code at every print line. I siapiy 
re-sized the screen to a 22 by 12 character box 
in approxiaately the aiddle of the (86 by 24) 
screen. So next I print the scraabied array to 
the screen with one space so that pieces aay be 
tsoved around. The gaae is olayed by entering the 
nuaber of the square which you want to iriove into 
the space. The orcgraaae checks to see if the 
nusiber is one of tne ones adjoining the space. A 
tone is sounded, and you are proapted for input. 
Pretty standaro nere, Hhough I could just have 
used ''PRINT CHRi(7)', but the gfx2 'bell' 
coaaand is nicer. If the player enters zero., the 
prograsse resets the screen back to its 89 by 24 
size, and clears the screen and quits. 

The r-oc^ r-*' +nc rnria ic fiir]\; ct»'ainh+ tr.rwapH 

ao^in *--^'^ orioina^ u^-^^ sanv SOTO-- t-^' f^ui^ -u^- 
of FGR-NEXT loops (not a good oractice m isv 
ODinion even m BASIC), and I nave used bcciean 

T.^-T, * ' QT "Hie D ii !""'-*■ S ^" Fcr ^v^^'V fiOVt r'E?''" X-D^' 

Q r T: C ^ afiiii- - ' T? P f ';" - \. f;^- j "? ^ V -"' QH ^ H 5 ^- t- fi " **■ '' ' U 1 1 -f' 



^rJ 



W i\ib.wc>Lc: 



finci :-f *|"jC h.jT'i^ict QSj'^tS Qt 



convi 



keeoinc trac-^ :! ^r.z vaniijl^s, and the vanoLJi 
ioocB. Basicy^ is a Dit, Linforqiving about 
^UNHATCHED CONTROL STRUCTURES' so you canH stoo 

no inn i rnTtuflncinTi uiirh ac thic i yi + kp m).AA'\z. 

tfilhout generating a series of error aessaqss 
when you quit the editor. One way around thi5 is 
to use a text editor (like VED or SCRED or SLED) 
to create the source code first, and then to 
load it into BasicdS. The only thing you HUST do 
in this case is to aake the word 'FkOCEOURE' in 
UPPERCASE the FIRST yGRD in the file. The letter 
P of procedure aust be the first character in 



■ HG ■'fouT Owii "^'riais and 
Basic dS prografBffies. even if 
• yant :o ^lari out on 
'his type, but are navmg 



f?os yoij reca; 

tribulations yit^ 

you don't rea 

conversions of 

difficulties aanaginq sciae aspect cf Sasicd?. 

Please write to ae care of the newsletter 

editor, and lei 'Professor Bob' help sharpen 

your prograsaing skills. 

Regards. 
Bob Oevries 



ooooooocflOUQGGOQOQQQcooooooooo 

Chapter 2 - Setting started in C 
YOUR FIRST C PR06RAH 

[ED: The text for this tutorial aentions sose C prograaies. These are not reproduced here, but are 
available on our Public Doaain disk nuaber 111 



The best say to get started sith C is to 
actually look at a ppograa, so load the file 
naaed TRIVIAL. C into your editor and display it 
on the ffionitor. You are looking at the sisplest 
possible C prograa. There is no way to siaplify 
this prograa op to leave anything out. 
Unfortunately, the prograa doesn't do anything. 
The word "sain' is very iaportant, and sust 
appear once, and only once in every C prograa. 
This is the point yhere execution is begun when 
the prograa is run. Ue tfill see later that this 
does not have to be the first stateaent in the 
prograa but it aust exist as the entry point. 

Following the 'siain" proqras narae is a pair 
of parentheses which are an indication to the 
cospiler that this is a function. Ue sill cover 



exactly shat a function is 



due tiae. For 



now, I suggest that you siaply include the pair 
of parentheses. The t«o curly brackets, 
properly called braces, are used to define the 
liaits of the prograa itself. The actual 
prograa stateaents go between the two braces and 
in this case, there are no stateaents because 
the prograa does absolutely nothing. You can 
coapile and run this prograa, but since it has 
no executable stateaents, it does nothing. Keep 
in aind however, that it is a valid C prograa. 

A PR06RAH THAT DOES SOMETHING 

For a auch aore interesting prograa, load 
the prograa naaed 'iRTSOtlE.C and display it on 
s the saae as the previous 



Ti 



prograa exceot that it has one executable 
stateaent between the braces. The executable 
stateaent is another function, unce again, we 
will not worry about what a function is, but 
only how to use this one. In order to output 
text to the aonitor, it is put within the 
function parentheses and bounded by quotation 
aarks. The end result is that whatever is 
included between the quotation aarks will be 
displayed on the aonitcr yhen the prograa is 
run. Notice the seai-colon at the end of the 
line. C uses a sesi-coion as a statesent 
terainator, so the seai-colon is required as a 
signal to the coEpiler that this line is 
coaplete. This procrae is also executable, so 
you can coapile and run it to see if it does 
what you think it should. 

ANOTHER PROGRAil WITH ilQRE OUTPUT 

Load the prograa yRTHQRE.C and display it on 
your aonitor for an exaaple of aore output and 
another seal I but iaportant concept. You will 
see that there are four prograa stateaents in 
this prograa, each one being a "printf function 
stateaent. The top line will be executed first, 
then the next, and so on, until the fourth line 
is coaplete. The stateaents are executed in 
order froa top to bottoa. Notice the funny 
character near the end of the first line, naaely 
the backslash. The backslash is used in the 
printf statefsent to indicate a special control 
character is folloyinq. In this case, the 'n* 



July 1991 



Page 7 



^N 



'ii^W^^l^. 



r* c T ! I r n f '■ i n 3 



VOL! aesire 









Diit H nsy 1 in 



cnardCtsr an^ 



start 3 new iins. V'cu coLiid 5v&n out it in the 
iaiddle of d aord and split the won betaeen t^o 
lines. The C coapiier considers the ccaDinaticn 
of the bdcksiasn and letter n as one cnaracter. 



A coBipIste dsscriotion of this prograa is 
now possible. The first printf outputs a line 
of text and returns the carriage. The second 
printf outputs a line but does not return the 
carriage so the third line is appended to that 
of the second, then followed bv two carriage 
returns, resulting in a blank line. Finally the 
fourth printf outputs a line fci lowed by a 
carriage return and the prograa is coapiete. 
Ccspile and run this prograa to see if it does 
what you expect it to do. It would be a good 
idea at this tise for you to experiaent by 
adding additional lines of printout to see if 
you understand how the statesents really sork. 

LETS PRINT SOHE NUMBERS 

Load the file nased ONEINT.C and display it 
on the sonitor for our first exasple of hcs to 
york with data in a C prograa. The entry point 
"isain' should be clear to you by nos as veil as 
the beginning brace. The first ne» thing we 
encounter is the line containing 'int index;", 
which is used to define an integer variable 
naaed "index". The "int" is a reserved »ord in 
C, and can therefore not be used for anything 
else. It defines a variable that can have a 
value froBs -32763 to 52767 on acst faicrocosputer 
iapieisentaticns of C. Consult your users »anual 
for the exact definition for your coapiler. The 
variable naae. "index", can be any naae that 
follows the rules for an identifier and is not 
one of the reserved words for C. Consult your 
aanual for an exact definition of an identifier 
for your coapiler. The final ch.aracter on the 
line, the seai-colon, is the stateaent 
terainator used in C. 

y'e will see in a later chapter that 
additional integers could also be defined on the 
saise line J but we will not coiaplicate the 
present situation. Observing the aain body of 
the prograa, you will notice that there are 
three statesents that assign a value to the 
variable "index", but only one at a tise. The 



Value jj^ino ":rint-8C out II ^nould !^e 

a'tvuxvkiC^f 1.lCv<^ vilvtv .kicjC/'. i j xituCt-^ a 

variable and can store sany different values. 
Please note that a^any tises the soras "printed 
out" are used to sean "displayed on the 
acnitcr". You sill find that in aany cases 
experienced prograaaers take this liberty, 
probably due to the "printf" function being used 
for sonitor display. 

HOy 00 UE .PRINT J^UHSERS 

To keeo cur orcfjise. let's return to the 
"printf statesents for a definition of hos tr^.ey 
worL Notice that they are ail identical and 
that they all begin just like the "printf" 
stateaents we have seen before. The first 
difference occurs when we coae to the t 
character. This is a special character that 
signals the output routine to stop copying 
characters to the output and do something 
different, naaely output a variable. The % sign 
is used to signal the start of aany different 
types of variables, but we will restrict 
ourselves to only one for this exaaple. The 
character following the % sign is a "d", which 
signals the output routine to get a deciaal 
value and outout it. yhere the deciaal value 
coaes froB will be covered shortly. After the 
"d", we find the faailiar \n. which is a signal 
to return the video 'carriage", and the closing 
quotation aark. 

All of the characters between the quotation 
ffiarks define the pattern of data to be output by 
this stateaent, and after the oattern, there is 
a coaaa followed by the variable naae 'index*. 
This is where the "orintf" statement gets the 
deciaal value aihich it will output because of 
the °j£d" we saw earlier, We could add aore 'W 
output field descriptors within the brackets and 
aore variables following the description to 
cause aore data to be printed with one 
stateaent. Keep in aind however, that it is 
iaportant that the nuaber of field descriptors 
and the nuaber of variable definitions aust be 
the saae or the runtiae systea will get confused 
and probably quit with a runtiae error. Much 
aore will be covered at a later tiae on all 
aspects of input and output foraatting. A 
reasonably good grasp of this topic is necessary 
in order to understand the following lessons. 
It is not necessary to understand everything 
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fair understanding of the basics. Coepile and 
run ONEINT.C and observe the output. 

HQU DD yE fiOO COHMEN'TS IN C 

Load the file COMMENTS. C and observe it on 
your laonitor for an exaeple of how coaifients can 
be added to a C progras. CoBaents are added to 
sake a prograe sore readable to you but the 
cotpiier aust ignore the cosaents. The slash 
star coffifalnation is used in C for cossent 
deliftiters. Tney are illustrated in the progras 
at hand. Please note that the prograa does not 
illustrate good cosaenting practice, but is 
intended to illustrate where coBsents can go in 
a progras. It is a very sloppy looking progras. 
The first slash star cojubination introduces the 
first coaeent and the star slash at the end of 
the first line tsrEinates this cossent. Note 
that this cofflsent is prior to tns beginning of 
the prograisi illustrating that a coaaent can 
precede the proqrais itself. Good prograsaing 
practice would include a cotsent prior to the 
progras sith a short introductory description of 
the prografii. The next consent is after the 
'aainO' program entry point and prior to the 
opening brace for the prograa code itself. The 
third coaaent starts after the first executable 
stateaent and continues for four lines. This is 
perfectly legal because a coasent can continue 
for as aany lines as desired until it is 
tereinated. 

Note carefully that if anything were 
included in the biank spaces to the left of the 
three continuation lines of the coaaent, it 
would be part of the coaaent and would not be 
coBpiled. The last coaaent is located following 
the coKpletion cf the prograa, illustrating that 
coeifients can go nearly anywhere in a C prograa. 
EKperisftent with this prograa by adding cosKents 
in other place? 
Co£:ftent out one cf the print! statements by 
putting cofflsisnt aeliaiters Dctn before and after 
it and see that it does not get printed out. 
CosKients are very iaportant in any prcgraaiing 
language because you will soon forget what you 
did and why you did it. It will be eiuch easier 
to sodify or fix a well coaisented prograjn a year 
froe now than one with few or no coasents. Vcu 
will yerv quicklv develop vour own oersonal 



style of coBfiienting. Soi; 

tft "nest" coBis^nts wrucn ztV: D9 ve"v ''iBndv ^' 

you need to 'ccsEsnt out' s section cf coce 

during debugging. Check your coEoiier 

documentation for the availability of this 

feature with you particular cospiier. CoRpile 
and run COHHENTS.C at this tiae. 

GDQD FQRriATTINS STYLE 

Load the file eOQDFOftfl.C and cDserve it on 
your aonitor. It is an exaaple of a well 
foraatted prograt. Even though it is very short 
and therefore does very little, it is very easy 
to see at a glance what it does. With the 
experience you have already gained in this 
tutorial, you should be able to very quicicly 
grasp the meaning of the orogras- in it's 
entirety. Vour C coipiler ignores all extra 
soaces and all carriage returns giving vou 
considerable freedos concerning how you format 
your prograa. Indenting and adding spaces is 
entirely up to you and is a satter of personal 
taste. Compile and run the progras to see if it 
does what you exoect it to do, 

NOW load and display the prograa USLVFORH.C 
and observe it. How long will it take you to 
figure out what this progras will do? It doesn't 
Blatter to the cospiier which foraat style you 
use^ but it will satter to you when you try to 
debug your prograst. Coapile this progras and 
run it. Vou aay be surprised to find that it is 
the saiae program as the last one, except for the 
foraatting. DonH get too worried about 
foraatting style yet. Vou will have plenty of 
tiae to develop a style cf your own as you learn 
the language. Be observant of styles as you see 
C prograifts in aagazines, books, ano other 
cubli cations. This should pretty well cover the 
basic concepts of proqrasisi! 
are sany other things to 



m C, but as tnere 
irn. we i^ill forge 
inead to additional prcora:;; structure. 



PRQGRAHtilNG EXERCISES 

i.yrite a progras to disolay your naae on 
the son i tor. 

2.!lodify the orograei to display your address 
and phone nuisber on separate lines by 
addino two additional "orintf" staieuients. 
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FREE - A bug-free vereion 

written by Mark Griffith et al 
Part 2 

[£D: This scjrce code saspie has cose to us via the BitNet aessags systee, troiR Mark Griffith J 

voi49 leax -l,x 
beq voU5 

exG d,y 

addd overflow, u 

exg d,y 

addd ,5 

bcc voUe 

leay l,y 

bra yoU6 

t BRI: clean up free clusters LSBs and old Dy;e= in sector loop counter 
vgUS lea5 o,e cleanup 
i-voU5 leas 2,5 cleanup 

std ntree"i-2,u Free sectorSj iotf order 
sty nfree.u Free sectors, high order 

% Print volurae status info * 



prnvo] 



Ibsr 


crlt 




ieax 


isge.pcr 


Point to "voluae; ' 


bsr 


pasg 


and print it 


Ida 


i$2e 


append a space 


b5r 


listen 


print that 


Ida 


f- 


Now a quote 


bsr 


iistch 


print that 


leax 


yolnaee.u 


Point to disk r.aae 


bsr 


pasg 


and print that 


Ida 


«"■* 


end with a quote 


bsr 


Iistch 


print that 


bsr 


crlf 


go to new line 


Dsr 


crlf 


and another 


ieax 


ssgS.pcr 


Point to ' "otal; ' 


ibsr 


pssQ 


print it 


Ieax 


total ;U 


Point to Total Sectors 


bsr 


dbiprez 


Set the ASCII nueber 


Ieax 


ffi5g],pcr 


Point to ' sectors (' 


ibsr 


pBisg 


print it 


ieax 


total. u 


Point to bytes total 


idd 


],x 


Bultiply by 25b 


std 


,^ 




Ida 


3,x 




sta 


2,x 




cir 


3..X 




Dsr 


dblDrsz 


G9i the ASCII number 


leax 


f[i5c2.pcr 


Point to ' bytes)" 


b=.r 


Df^iSO 


and print 


•"iC ■■ 


C" 1 * 


^''" : r V £ iie^ i iHt 


"' ^- ' ':;■ 


^■cnl r.rr. 


p ,-. T r-. * t r. " ^ T^ w i- ' ■ 
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ieax 


ntree/j 


bsr 


dblprez 


ieax 


esGijpcr 


bsr 


p£sg 


ieax 


r.frae,u 


idd 


^x 


5id 


.- 


Ida 


3,x 


5t£ 


4. , f. 


cir 


3,x 


bsr 


dDiprez 


ieax 


ft5g2,pcr 


bsr 


pftsg 


bsr 


crif 


cirb 




ibra 


exit 



Pcin; 10 sectors free 
cet 



VT 



h'O 



nt tc " sectors (^ 



:nt tc bytes fref 



Euitiply by 25b 



Get the ASCII i^uftber 
Point to " bytes)* 
and print that too 
Do a coupie neslmes 
f(c errors 
Finish up 



paq 



ntnnttttttintttntmtttittt 
t 

t Subroutines 

t 



t Print strinGS i 



DKSg 


pshs 


a^x 


P!Esg2 


Ida 


.Ji+ 




beq 


pssgy 




bsr 






tst 


-i,x 




bpl 


pE5g2 


pssgS 


pL'IS 


'^■.^/r' 



t Send character in rea A to output i 



listen 


pshs 


-r-jY 




tfr 


a,b 




bra 


send:! 


crIf 


pshs 


^:^-.y 




idb 


n6d 




bra 


sendc I 


sendc 


pshs 


c.x.v 


sendcf 


andb 


i$7f 




pshs 


b 




tfr 


5,X 




idv 


#1 




ids 


II 




osS 


iJtfritln 




leas 


'' ; -■ 


ccr./jry 


Duls 


d.X.V.DC 



in; W -> ri gf 
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hilb 


equ 


e 


lolb 


equ 


2 


digval 


equ 


4 


dbliter 


equ 


5 


dblzflg 


equ 


b 


dblzch 


eou 


7 


fraees 


set 


dblzch+l 


dbiprez 


pshs 
clra 


C;XJ 




bra 


dbiee 


dblore 


PSHS 


0,)t.Y 




ide 


i$2e 


dbiee 


leas 


-traaes^s 




5U 


dbizch.S 




Idd 


hilb,x 




std 


hiib,s 




Idd 


loie.x 




std 


iclb,E 



ida Idblitk t posers within table 

sta dbliter. 5 loop iteration count 

ieax dbltbl,pcr highest lO'n 

cir dblzflg, 5 

dblie Ida t'e 

sta digval, s 

dbize Idd iolb,S low 16 of N 

subd lo]^,'t EinuE 1^'i 

tfp d,y 

Idd hi!€,s 

sbcb hilb+1,)( 

sbca hi!6,]( 

bcs dbrSw subtract successful? 

sty iclb^s yes, save hi 

std hiib..5 and loi 

inc digval, s 

bra dbi2e 

dbI3e dec dbliter. s iteration count 

bei:^ dblol if last, aust send a digit 

Ida digval, s update leading 6 suppression 

suba i'e 

ora dblzflg. 5 

sta dblzflg, s 

bne dbl51 

dblzch, 5 get leading 6 suppressor 



iri 



Dec dtioZ 1! none 

sts dinvdl ■; sDace 

ncKc V s5Vt ib: oC'inter 

16'. i'^ 
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ULlil 



puis A 

ieax Ji,x next 

tst dbl;ter,£ Eivbe all corie 

bne dDlie next power of ten 



dDl3« ieis fraffies.s 



db itbi 

iob $3e9A^,$CA0e one billion 

fdb JeSF5,$Efee hundred aillion 

fdb *e^98,*Sb3e ten si 11 ion 

fdb Je9BF,*424e one Eillion 

fdb teyei,$3bAe hundred thousand 

fdb Jetfee,$27'ie ten thouEino 

fdb 5»9tfy4e3ES one thousand 

fdb $eeee_,$6ebi one hundred 

fdb m^^Mm^ ten 

fdb $y6Be,$y«ei one 

dblitk eau (T-dbitbD/ii 



t Static Strings t 



ffisgO 
Sisg] 
!ftsg2 
EsgS 

ft5G4 



fcs 'Volutss: " 

fcs " sectors ( 

us " bytes) " 

C5 ' Total: ' 

tcs ■ Free: 



esiod 
endeod equ t 
end 
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SINGER 


Maurice 


217 Preston Road 


VYNNUM VEST 


Qid 4178 


SKEBE 


Jeff 


23 Noraa Road 


PALM BEACH 


NSs 2199 


STEPHE)^ 


val 


1 Habel Street 


CAMBERUELL 


Vic 3124 


SIJINSCDE 


Rofair 


!7 Melaleuca Street 


SLADE POINT 


Sid iliv 


TARviN 


C'lgbv 


PC Bex ^58 


RfiNDiiICK 


NSi 2i'3! 


jnSUuRT- 


Rob 


28 Salisbury Road 
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ftU|TR6LiftN 0S§ USER BRflUP APPLICATION FDRfl 

xttmitttittitUUiiiiitimtititntnxU 
Surnaae ; First Nase : Title irir. ,Dr. .etc) 



Street ; 



City / Suburb ; _ Stats ;^_ Postcode 

Hoae Phone ; BuEiness Phone : 



Age Grc'jp (please tick) Under 18 [_] lS-25 [„] 26-35 [_J 3b-i5 [__] 46-55 [__] over 55 [_J 
Do you run 0S5 Level ] [_] QSS Level 2 ij 03K [_] (please tick) 

TvDe ci Cosputer for u3S ; hesicrv Size : 



Diskette Size (inches)! NuEDer of Cylinders (tracks [;er side); Sides; NUEber of Drives 



^^rifiter Tyce 



HodeK Type ; 



umer hardware 



Special Interests ! 



Can you contribute articles to this Newsletter 



Date ; / / Sicnatiiri 



Aracunt Enclosed: i ( 118-64 t'lll cover you for 12 iiOTiths) 

(fit2S-yy iQ-T overseas subscriptions ) 

Cheques ude payable to NATIONAL OSS USERGROUP please, 

Ail subscriptions start with the September issue, and back issues i?ill be sent yhere apolicable 

Please Return Coapleted Fcrs; to :- 

NATIONAL 0S9 USER GROUP 

C/o eordon SENTZEN 

8 ODIN STREET, 

SUNNY8ANK QLD im (Prione e? 34; 333': 

AUSTRALIA 



